3.1406 \(\int \frac{1}{(c e+d e x)^{13/2} \sqrt{1-c^2-2 c d x-d^2 x^2}} \, dx\)
Optimal. Leaf size=172 \[ \frac{30 \text{EllipticF}\left (\sin ^{-1}\left (\frac{\sqrt{c e+d e x}}{\sqrt{e}}\right ),-1\right )}{77 d e^{13/2}}-\frac{30 \sqrt{-c^2-2 c d x-d^2 x^2+1}}{77 d e^5 (c e+d e x)^{3/2}}-\frac{18 \sqrt{-c^2-2 c d x-d^2 x^2+1}}{77 d e^3 (c e+d e x)^{7/2}}-\frac{2 \sqrt{-c^2-2 c d x-d^2 x^2+1}}{11 d e (c e+d e x)^{11/2}} \]
[Out]
(-2*Sqrt[1 - c^2 - 2*c*d*x - d^2*x^2])/(11*d*e*(c*e + d*e*x)^(11/2)) - (18*Sqrt[1 - c^2 - 2*c*d*x - d^2*x^2])/
(77*d*e^3*(c*e + d*e*x)^(7/2)) - (30*Sqrt[1 - c^2 - 2*c*d*x - d^2*x^2])/(77*d*e^5*(c*e + d*e*x)^(3/2)) + (30*E
llipticF[ArcSin[Sqrt[c*e + d*e*x]/Sqrt[e]], -1])/(77*d*e^(13/2))
________________________________________________________________________________________
Rubi [A] time = 0.118387, antiderivative size = 172, normalized size of antiderivative = 1.,
number of steps used = 5, number of rules used = 3, integrand size = 37, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0.081, Rules used =
{693, 689, 221} \[ -\frac{30 \sqrt{-c^2-2 c d x-d^2 x^2+1}}{77 d e^5 (c e+d e x)^{3/2}}-\frac{18 \sqrt{-c^2-2 c d x-d^2 x^2+1}}{77 d e^3 (c e+d e x)^{7/2}}-\frac{2 \sqrt{-c^2-2 c d x-d^2 x^2+1}}{11 d e (c e+d e x)^{11/2}}+\frac{30 F\left (\left .\sin ^{-1}\left (\frac{\sqrt{c e+d x e}}{\sqrt{e}}\right )\right |-1\right )}{77 d e^{13/2}} \]
Antiderivative was successfully verified.
[In]
Int[1/((c*e + d*e*x)^(13/2)*Sqrt[1 - c^2 - 2*c*d*x - d^2*x^2]),x]
[Out]
(-2*Sqrt[1 - c^2 - 2*c*d*x - d^2*x^2])/(11*d*e*(c*e + d*e*x)^(11/2)) - (18*Sqrt[1 - c^2 - 2*c*d*x - d^2*x^2])/
(77*d*e^3*(c*e + d*e*x)^(7/2)) - (30*Sqrt[1 - c^2 - 2*c*d*x - d^2*x^2])/(77*d*e^5*(c*e + d*e*x)^(3/2)) + (30*E
llipticF[ArcSin[Sqrt[c*e + d*e*x]/Sqrt[e]], -1])/(77*d*e^(13/2))
Rule 693
Int[((d_) + (e_.)*(x_))^(m_)*((a_.) + (b_.)*(x_) + (c_.)*(x_)^2)^(p_.), x_Symbol] :> Simp[(-2*b*d*(d + e*x)^(m
+ 1)*(a + b*x + c*x^2)^(p + 1))/(d^2*(m + 1)*(b^2 - 4*a*c)), x] + Dist[(b^2*(m + 2*p + 3))/(d^2*(m + 1)*(b^2
- 4*a*c)), Int[(d + e*x)^(m + 2)*(a + b*x + c*x^2)^p, x], x] /; FreeQ[{a, b, c, d, e, p}, x] && NeQ[b^2 - 4*a*
c, 0] && EqQ[2*c*d - b*e, 0] && NeQ[m + 2*p + 3, 0] && LtQ[m, -1] && (IntegerQ[2*p] || (IntegerQ[m] && Rationa
lQ[p]) || IntegerQ[(m + 2*p + 3)/2])
Rule 689
Int[1/(Sqrt[(d_) + (e_.)*(x_)]*Sqrt[(a_.) + (b_.)*(x_) + (c_.)*(x_)^2]), x_Symbol] :> Dist[(4*Sqrt[-(c/(b^2 -
4*a*c))])/e, Subst[Int[1/Sqrt[Simp[1 - (b^2*x^4)/(d^2*(b^2 - 4*a*c)), x]], x], x, Sqrt[d + e*x]], x] /; FreeQ[
{a, b, c, d, e}, x] && NeQ[b^2 - 4*a*c, 0] && EqQ[2*c*d - b*e, 0] && LtQ[c/(b^2 - 4*a*c), 0]
Rule 221
Int[1/Sqrt[(a_) + (b_.)*(x_)^4], x_Symbol] :> Simp[EllipticF[ArcSin[(Rt[-b, 4]*x)/Rt[a, 4]], -1]/(Rt[a, 4]*Rt[
-b, 4]), x] /; FreeQ[{a, b}, x] && NegQ[b/a] && GtQ[a, 0]
Rubi steps
\begin{align*} \int \frac{1}{(c e+d e x)^{13/2} \sqrt{1-c^2-2 c d x-d^2 x^2}} \, dx &=-\frac{2 \sqrt{1-c^2-2 c d x-d^2 x^2}}{11 d e (c e+d e x)^{11/2}}+\frac{9 \int \frac{1}{(c e+d e x)^{9/2} \sqrt{1-c^2-2 c d x-d^2 x^2}} \, dx}{11 e^2}\\ &=-\frac{2 \sqrt{1-c^2-2 c d x-d^2 x^2}}{11 d e (c e+d e x)^{11/2}}-\frac{18 \sqrt{1-c^2-2 c d x-d^2 x^2}}{77 d e^3 (c e+d e x)^{7/2}}+\frac{45 \int \frac{1}{(c e+d e x)^{5/2} \sqrt{1-c^2-2 c d x-d^2 x^2}} \, dx}{77 e^4}\\ &=-\frac{2 \sqrt{1-c^2-2 c d x-d^2 x^2}}{11 d e (c e+d e x)^{11/2}}-\frac{18 \sqrt{1-c^2-2 c d x-d^2 x^2}}{77 d e^3 (c e+d e x)^{7/2}}-\frac{30 \sqrt{1-c^2-2 c d x-d^2 x^2}}{77 d e^5 (c e+d e x)^{3/2}}+\frac{15 \int \frac{1}{\sqrt{c e+d e x} \sqrt{1-c^2-2 c d x-d^2 x^2}} \, dx}{77 e^6}\\ &=-\frac{2 \sqrt{1-c^2-2 c d x-d^2 x^2}}{11 d e (c e+d e x)^{11/2}}-\frac{18 \sqrt{1-c^2-2 c d x-d^2 x^2}}{77 d e^3 (c e+d e x)^{7/2}}-\frac{30 \sqrt{1-c^2-2 c d x-d^2 x^2}}{77 d e^5 (c e+d e x)^{3/2}}+\frac{30 \operatorname{Subst}\left (\int \frac{1}{\sqrt{1-\frac{x^4}{e^2}}} \, dx,x,\sqrt{c e+d e x}\right )}{77 d e^7}\\ &=-\frac{2 \sqrt{1-c^2-2 c d x-d^2 x^2}}{11 d e (c e+d e x)^{11/2}}-\frac{18 \sqrt{1-c^2-2 c d x-d^2 x^2}}{77 d e^3 (c e+d e x)^{7/2}}-\frac{30 \sqrt{1-c^2-2 c d x-d^2 x^2}}{77 d e^5 (c e+d e x)^{3/2}}+\frac{30 F\left (\left .\sin ^{-1}\left (\frac{\sqrt{c e+d e x}}{\sqrt{e}}\right )\right |-1\right )}{77 d e^{13/2}}\\ \end{align*}
Mathematica [C] time = 0.0259742, size = 40, normalized size = 0.23 \[ -\frac{2 (c+d x) \, _2F_1\left (-\frac{11}{4},\frac{1}{2};-\frac{7}{4};(c+d x)^2\right )}{11 d (e (c+d x))^{13/2}} \]
Antiderivative was successfully verified.
[In]
Integrate[1/((c*e + d*e*x)^(13/2)*Sqrt[1 - c^2 - 2*c*d*x - d^2*x^2]),x]
[Out]
(-2*(c + d*x)*Hypergeometric2F1[-11/4, 1/2, -7/4, (c + d*x)^2])/(11*d*(e*(c + d*x))^(13/2))
________________________________________________________________________________________
Maple [B] time = 0.298, size = 1532, normalized size = 8.9 \begin{align*} \text{result too large to display} \end{align*}
Verification of antiderivative is not currently implemented for this CAS.
[In]
int(1/(d*e*x+c*e)^(13/2)/(-d^2*x^2-2*c*d*x-c^2+1)^(1/2),x)
[Out]
1/462*(84+24*c^2-231*(2*d*x+2*c+2)^(1/2)*(-d*x-c)^(1/2)*(-2*d*x-2*c+2)^(1/2)*EllipticE(1/2*(2*d*x+2*c+2)^(1/2)
,2^(1/2))*c^5+385*(2*d*x+2*c+2)^(1/2)*(-2*d*x-2*c+2)^(1/2)*(d*x+c)^(1/2)*EllipticF(1/2*(-2*d*x-2*c+2)^(1/2),2^
(1/2))*c^5+72*c^4+295*(2*d*x+2*c+2)^(1/2)*(-d*x-c)^(1/2)*(-2*d*x-2*c+2)^(1/2)*EllipticF(1/2*(2*d*x+2*c+2)^(1/2
),2^(1/2))*x^5*d^5+231*(2*d*x+2*c+2)^(1/2)*(-2*d*x-2*c+2)^(1/2)*(d*x+c)^(1/2)*EllipticE(1/2*(-2*d*x-2*c+2)^(1/
2),2^(1/2))*c^5+24*d^2*x^2-180*c^6-180*d^6*x^6-2700*x^2*c^4*d^2-3600*x^3*c^3*d^3-2700*x^4*c^2*d^4-1080*x*c^5*d
-1080*x^5*c*d^5-231*(2*d*x+2*c+2)^(1/2)*(-d*x-c)^(1/2)*(-2*d*x-2*c+2)^(1/2)*EllipticE(1/2*(2*d*x+2*c+2)^(1/2),
2^(1/2))*x^5*d^5+385*(2*d*x+2*c+2)^(1/2)*(-2*d*x-2*c+2)^(1/2)*(d*x+c)^(1/2)*EllipticF(1/2*(-2*d*x-2*c+2)^(1/2)
,2^(1/2))*x^5*d^5+231*(2*d*x+2*c+2)^(1/2)*(-2*d*x-2*c+2)^(1/2)*(d*x+c)^(1/2)*EllipticE(1/2*(-2*d*x-2*c+2)^(1/2
),2^(1/2))*x^5*d^5+288*x^3*c*d^3+288*x*c^3*d+295*(2*d*x+2*c+2)^(1/2)*(-d*x-c)^(1/2)*(-2*d*x-2*c+2)^(1/2)*Ellip
ticF(1/2*(2*d*x+2*c+2)^(1/2),2^(1/2))*c^5+48*c*d*x+432*c^2*d^2*x^2+72*d^4*x^4+1155*(2*d*x+2*c+2)^(1/2)*(-2*d*x
-2*c+2)^(1/2)*(d*x+c)^(1/2)*EllipticE(1/2*(-2*d*x-2*c+2)^(1/2),2^(1/2))*x^4*c*d^4-2310*(2*d*x+2*c+2)^(1/2)*(-d
*x-c)^(1/2)*(-2*d*x-2*c+2)^(1/2)*EllipticE(1/2*(2*d*x+2*c+2)^(1/2),2^(1/2))*x^3*c^2*d^3+3850*(2*d*x+2*c+2)^(1/
2)*(-2*d*x-2*c+2)^(1/2)*(d*x+c)^(1/2)*EllipticF(1/2*(-2*d*x-2*c+2)^(1/2),2^(1/2))*x^3*c^2*d^3+2310*(2*d*x+2*c+
2)^(1/2)*(-2*d*x-2*c+2)^(1/2)*(d*x+c)^(1/2)*EllipticE(1/2*(-2*d*x-2*c+2)^(1/2),2^(1/2))*x^3*c^2*d^3+2950*(2*d*
x+2*c+2)^(1/2)*(-d*x-c)^(1/2)*(-2*d*x-2*c+2)^(1/2)*EllipticF(1/2*(2*d*x+2*c+2)^(1/2),2^(1/2))*x^2*c^3*d^2-2310
*(2*d*x+2*c+2)^(1/2)*(-d*x-c)^(1/2)*(-2*d*x-2*c+2)^(1/2)*EllipticE(1/2*(2*d*x+2*c+2)^(1/2),2^(1/2))*x^2*c^3*d^
2+3850*(2*d*x+2*c+2)^(1/2)*(-2*d*x-2*c+2)^(1/2)*(d*x+c)^(1/2)*EllipticF(1/2*(-2*d*x-2*c+2)^(1/2),2^(1/2))*x^2*
c^3*d^2+2310*(2*d*x+2*c+2)^(1/2)*(-2*d*x-2*c+2)^(1/2)*(d*x+c)^(1/2)*EllipticE(1/2*(-2*d*x-2*c+2)^(1/2),2^(1/2)
)*x^2*c^3*d^2+1475*(2*d*x+2*c+2)^(1/2)*(-d*x-c)^(1/2)*(-2*d*x-2*c+2)^(1/2)*EllipticF(1/2*(2*d*x+2*c+2)^(1/2),2
^(1/2))*x*c^4*d-1155*(2*d*x+2*c+2)^(1/2)*(-d*x-c)^(1/2)*(-2*d*x-2*c+2)^(1/2)*EllipticE(1/2*(2*d*x+2*c+2)^(1/2)
,2^(1/2))*x*c^4*d+1925*(2*d*x+2*c+2)^(1/2)*(-2*d*x-2*c+2)^(1/2)*(d*x+c)^(1/2)*EllipticF(1/2*(-2*d*x-2*c+2)^(1/
2),2^(1/2))*x*c^4*d+1155*(2*d*x+2*c+2)^(1/2)*(-2*d*x-2*c+2)^(1/2)*(d*x+c)^(1/2)*EllipticE(1/2*(-2*d*x-2*c+2)^(
1/2),2^(1/2))*x*c^4*d+1475*(2*d*x+2*c+2)^(1/2)*(-d*x-c)^(1/2)*(-2*d*x-2*c+2)^(1/2)*EllipticF(1/2*(2*d*x+2*c+2)
^(1/2),2^(1/2))*x^4*c*d^4+1925*(2*d*x+2*c+2)^(1/2)*(-2*d*x-2*c+2)^(1/2)*(d*x+c)^(1/2)*EllipticF(1/2*(-2*d*x-2*
c+2)^(1/2),2^(1/2))*x^4*c*d^4+2950*(2*d*x+2*c+2)^(1/2)*(-d*x-c)^(1/2)*(-2*d*x-2*c+2)^(1/2)*EllipticF(1/2*(2*d*
x+2*c+2)^(1/2),2^(1/2))*x^3*c^2*d^3-1155*(2*d*x+2*c+2)^(1/2)*(-d*x-c)^(1/2)*(-2*d*x-2*c+2)^(1/2)*EllipticE(1/2
*(2*d*x+2*c+2)^(1/2),2^(1/2))*x^4*c*d^4)/e^7*(-d^2*x^2-2*c*d*x-c^2+1)^(1/2)*(e*(d*x+c))^(1/2)/(d*x+c)^6/(d^2*x
^2+2*c*d*x+c^2-1)/d
________________________________________________________________________________________
Maxima [F] time = 0., size = 0, normalized size = 0. \begin{align*} \int \frac{1}{\sqrt{-d^{2} x^{2} - 2 \, c d x - c^{2} + 1}{\left (d e x + c e\right )}^{\frac{13}{2}}}\,{d x} \end{align*}
Verification of antiderivative is not currently implemented for this CAS.
[In]
integrate(1/(d*e*x+c*e)^(13/2)/(-d^2*x^2-2*c*d*x-c^2+1)^(1/2),x, algorithm="maxima")
[Out]
integrate(1/(sqrt(-d^2*x^2 - 2*c*d*x - c^2 + 1)*(d*e*x + c*e)^(13/2)), x)
________________________________________________________________________________________
Fricas [F] time = 0., size = 0, normalized size = 0. \begin{align*}{\rm integral}\left (-\frac{\sqrt{-d^{2} x^{2} - 2 \, c d x - c^{2} + 1} \sqrt{d e x + c e}}{d^{9} e^{7} x^{9} + 9 \, c d^{8} e^{7} x^{8} +{\left (36 \, c^{2} - 1\right )} d^{7} e^{7} x^{7} + 7 \,{\left (12 \, c^{3} - c\right )} d^{6} e^{7} x^{6} + 21 \,{\left (6 \, c^{4} - c^{2}\right )} d^{5} e^{7} x^{5} + 7 \,{\left (18 \, c^{5} - 5 \, c^{3}\right )} d^{4} e^{7} x^{4} + 7 \,{\left (12 \, c^{6} - 5 \, c^{4}\right )} d^{3} e^{7} x^{3} + 3 \,{\left (12 \, c^{7} - 7 \, c^{5}\right )} d^{2} e^{7} x^{2} +{\left (9 \, c^{8} - 7 \, c^{6}\right )} d e^{7} x +{\left (c^{9} - c^{7}\right )} e^{7}}, x\right ) \end{align*}
Verification of antiderivative is not currently implemented for this CAS.
[In]
integrate(1/(d*e*x+c*e)^(13/2)/(-d^2*x^2-2*c*d*x-c^2+1)^(1/2),x, algorithm="fricas")
[Out]
integral(-sqrt(-d^2*x^2 - 2*c*d*x - c^2 + 1)*sqrt(d*e*x + c*e)/(d^9*e^7*x^9 + 9*c*d^8*e^7*x^8 + (36*c^2 - 1)*d
^7*e^7*x^7 + 7*(12*c^3 - c)*d^6*e^7*x^6 + 21*(6*c^4 - c^2)*d^5*e^7*x^5 + 7*(18*c^5 - 5*c^3)*d^4*e^7*x^4 + 7*(1
2*c^6 - 5*c^4)*d^3*e^7*x^3 + 3*(12*c^7 - 7*c^5)*d^2*e^7*x^2 + (9*c^8 - 7*c^6)*d*e^7*x + (c^9 - c^7)*e^7), x)
________________________________________________________________________________________
Sympy [F(-1)] time = 0., size = 0, normalized size = 0. \begin{align*} \text{Timed out} \end{align*}
Verification of antiderivative is not currently implemented for this CAS.
[In]
integrate(1/(d*e*x+c*e)**(13/2)/(-d**2*x**2-2*c*d*x-c**2+1)**(1/2),x)
[Out]
Timed out
________________________________________________________________________________________
Giac [F] time = 0., size = 0, normalized size = 0. \begin{align*} \int \frac{1}{\sqrt{-d^{2} x^{2} - 2 \, c d x - c^{2} + 1}{\left (d e x + c e\right )}^{\frac{13}{2}}}\,{d x} \end{align*}
Verification of antiderivative is not currently implemented for this CAS.
[In]
integrate(1/(d*e*x+c*e)^(13/2)/(-d^2*x^2-2*c*d*x-c^2+1)^(1/2),x, algorithm="giac")
[Out]
integrate(1/(sqrt(-d^2*x^2 - 2*c*d*x - c^2 + 1)*(d*e*x + c*e)^(13/2)), x)